home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctj1086.arc / PAUSES.DEF < prev    next >
Text File  |  1986-07-21  |  545b  |  17 lines
  1. DEFINITION MODULE Pauses;
  2. (*
  3. Title   : Pauses.DEF -- SplitScreen Pauses
  4. LastEdit: July 22, 1986
  5. Author  : John T. Cockerham, M.D.
  6. System  : LOGITECH MODULA-2/86 
  7. *)
  8.   EXPORT QUALIFIED Pause, GraphicsPause;
  9.  
  10.   (* This procedure raises a split screen and prints a message there
  11.      awaiting the user to continue. Can only be used text mode. *)
  12.   PROCEDURE Pause(msg : ARRAY OF CHAR);
  13.  
  14.   (* This procedure is the pausing procedure in graphics modes *)
  15.   PROCEDURE GraphicsPause (Page : CARDINAL; msg : ARRAY OF CHAR);
  16. END Pauses.
  17.